home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / batchut / sprbat3b.zip / RUNME.BAT < prev    next >
DOS Batch File  |  1990-01-21  |  3KB  |  140 lines
  1. echo off
  2.     nocurs
  3.     raw on
  4.     toggle +c > nul
  5.     bebe color bright yellow on black clear
  6.  
  7. :no
  8.     echo 
  9.     echo 
  10.     bebe getstring first What is your first name? 
  11.     echo 
  12.     echo 
  13.     bebe getstring last What is your last name? 
  14.     echo 
  15.     echo 
  16.     echo %first% %last%
  17.     echo Is this correct?
  18. :reply
  19.     bebe getkey
  20.     if %key%==N goto no
  21.     if %key%==Y goto yes
  22.     beep
  23.     echo You must answer Y for yes or N for no!
  24.   goto reply
  25. :yes
  26.     set last=
  27.     cls
  28.     echo 
  29.     echo 
  30.     echo Well hello %first% !
  31.     echo 
  32.     echo This is a sample batch file that I have written to illustrate
  33.     echo the unique capabilities that these little utilities can give!
  34.     bebe hold 7
  35.     echo 
  36.     echo 
  37.     echo These are simplistic examples, but I hope they will give you
  38.     echo an idea of what can be accomplished with these utilities.
  39.     echo 
  40.     echo 
  41.     echo To continue go ahead and
  42.     pause
  43.  
  44. :box
  45.     bebe color bright cyan on black clear
  46.     sound t
  47.     bebe box 11 38 2 4 1
  48.     bebe box 10 35 4 10 1
  49.     bebe box 9 32 6 16 1
  50.     bebe box 8 29 8 22 1
  51.     bebe box 7 26 10 28 1
  52.     bebe box 6 23 12 34 1
  53.     bebe color bright magenta on black
  54.     sound t
  55.     bebe box 11 38 2 4 2
  56.     bebe box 10 35 4 10 2
  57.     bebe box 9 32 6 16 2
  58.     bebe box 8 29 8 22 2
  59.     bebe box 7 26 10 28 2
  60.     bebe box 6 23 12 34 2
  61.     bebe color black on black
  62.     sound t
  63.     bebe box 11 38 2 4 2
  64.     bebe box 10 35 4 10 2
  65.     bebe box 9 32 6 16 2
  66.     bebe box 8 29 8 22 2
  67.     bebe box 7 26 10 28 2
  68.     bebe box 6 23 12 34 2
  69.     bebe color bright yellow on black
  70.     bebe getstring age How Old Are You %first% ? 
  71.     cls
  72.  
  73. :candles
  74.     bebe calc %age% + 1
  75.     set age=%result%
  76.     set cnt=0
  77.     set candle=F
  78. :loop
  79.     bebe calc %cnt% + 1
  80.     set cnt=%result%
  81.   if %cnt%==%age% goto skip
  82.     echo 
  83.     if %cnt%==10 set candle=T
  84.   if %candle%==T goto ten
  85.     echo                   Ö
  86.     echo                  ███
  87.     bebe say     %cnt%
  88.     echo                 ███
  89.     echo                  ███
  90.   goto loop
  91. :ten
  92.     echo                   Ö
  93.     echo                  ███
  94.     bebe say     %cnt%
  95.     echo                ███
  96.     echo                  ███
  97.   goto loop
  98. :skip
  99.     echo 
  100.     bebe calc %age% - 1
  101.     echo Aren't you glad you didn't have to blow those %result% candles out?
  102.     echo 
  103.     set age=
  104.     set cnt=
  105.     set candle=
  106.     pause
  107.     cls
  108.  
  109. :encounter
  110.     echo Press any key for a close encounter
  111.     echo 
  112.     bebe getkey
  113.     tune 1.9
  114.     tune 2.9
  115.     tune 3.9
  116.  
  117. :done
  118.     cls
  119.     bebe status clear
  120.     echo 
  121.     echo 
  122.     echo Well that concludes this demonstration.
  123.     echo 
  124.     echo I hope that you have found it interesting %first%!
  125.     echo And I hope that you find these utilities useful.
  126.     echo 
  127.     echo To get a printout of the documentation simply type:
  128.     echo 
  129.     echo COPY SUPERBAT.DOC PRN
  130.     echo 
  131.     bebe hold 5
  132.     echo 
  133.     echo 
  134.     echo Good Bye!
  135.     set first=
  136.     normal
  137.     toggle -c > nul
  138.     raw off
  139.     echo 
  140.